home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 25
/
AMIGAplus Sonderheft 25 (2000)(Falke)(DE)(Track 1 of 4)[!].iso
/
Updates
/
AmigaOS3.5
/
ReportGen
/
ReportGen.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
2000-05-16
|
3KB
|
205 lines
/* ReportGen Commodity demo and documentation script */
/****** ReportGenCx/SAVE **************************************
NAME
SAVE
SYNOPSIS
void = HIDE
FUNCTION
Saves the current settings.
INPUTS
none
RESULT
none
**************************************************************************
*/
/****** ReportGenCx/HIDE **************************************
NAME
HIDE
SYNOPSIS
result = HIDE
FUNCTION
hides the application window
INPUTS
none
RESULT
result - returns FALSE if not successful
**************************************************************************
*/
/****** ReportGenCx/UNHIDE **************************************
NAME
UNHIDE
SYNOPSIS
result = UNHIDE
FUNCTION
restores the application window
INPUTS
none
RESULT
result - returns FALSE if not successful
**************************************************************************
*/
/****** ReportGenCx/ICONIFY **************************************
NAME
ICONIFY
SYNOPSIS
result = ICONIFY
FUNCTION
iconifies the application
INPUTS
none
RESULT
1 if successful, 0 for failure
**************************************************************************
*/
/****** ReportGenCx/UNICONIFY **************************************
NAME
UNICONIFY
SYNOPSIS
result = UNICONIFY
FUNCTION
uniconifies the application
INPUTS
none
RESULT
result - 1 if successful, 0 for failure
**************************************************************************
*/
/****** ReportGenCx/VERSION **************************************
NAME
VERSION
SYNOPSIS
result = VERSION
FUNCTION
returns the version string
INPUTS
none
RESULT
result - returns the version string of ReportGenCx
**************************************************************************
*/
/****** ReportGenCx/AUTHOR **************************************
NAME
AUTHOR
SYNOPSIS
result = AUTHOR
FUNCTION
returns the author information
INPUTS
none
RESULT
result - returns the author string of ReportGenCx
**************************************************************************
*/
/****** ReportGenCx/QUIT **************************************
NAME
QUIT
SYNOPSIS
void = QUIT
FUNCTION
quits the application
INPUTS
none
RESULT
none
**************************************************************************
*/
options results
ADDRESS REPORTGEN.1
say 'Hiding..'
HIDE
Call mywait()
say 'UnHiding..'
UNHIDE
Call mywait()
say 'Iconify..'
ICONIFY
Call mywait()
say 'UnIconify..'
UNICONIFY
Call mywait()
VERSION
say 'Version: 'RESULT
Call mywait()
AUTHOR
say ' Author: 'RESULT
Call mywait()
say 'Quitting..'
QUIT
exit
mywait: procedure
address command 'c:wait 2'
return